Top 10k strings from Mini Office (1985)(Database Software).tzx
in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Utilities & Educational / Sinclair ZX Spectrum - Utilities & Educational - [TZX] (TOSEC-v2007-01-01) /
Back to the directory listing
10 ((CR+DR)/10 6 BASE=BASE+1 6 DATABASE PUBLICATIONS 4 Tape error. 4 PNUM1=PNUM1+1 4 FINISH/57.324 4 BASE=BASE-1 4 ;"PUBLICATIONS" 4 ;"PRESENTS" 4 ;"MODE ": 4 ;"ARE YOU SURE Y/N "; 4 MINI OFFICE 1984 3 PNUM=PNUM*10 3 K$="SELECT OPTION": 3 Break pressed. 3 ;"SYNTAX": 3 ;" S P E C T R U M ": 3 :D\2p\2G\*B\"n\"E\> 3 *E\"n\!G\4~2p\:D\ 2 TOTAL=TOTAL+N(F): 2 R+" RECORD(S) ENTERED": 2 NO FORMULA IN BOX 2 L3=L2*L1*8 2 K$="OPTION "+W$+" SELECTED": 2 G=START/57.324 2 File verified and O.K. 2 F$(XC+F)>57 2 F$(XC+F)<48 2 F$(XC)="/" 2 F$(XC)="." 2 F$(XC)="-" 2 F$(XC)="+" 2 F$(XC)="*" 2 Enter the name of the file to be 2 D$(R0,NS,LS) 2 BASE=BASE+8 2 BASE=BASE+ 2 BASE=44993 2 BASE=44720 2 BASE,LER+48 2 =61#6 #6 #6 #6 #60#60#60#= 2 ;F$(A);":": 2 ;"REPLACING"; 2 ;"NUMBER " 2 ;"NO ROOM FOR MORE FORMULAE": 2 ;"By PETER WILLIAMSON" 2 61#6 #6 #6 #6 #60#60#60#: 2 60+60+60!m 2 /MAXVAL*N(F) 2 /MAXVAL*N(1 2 )-OLDCC)*8 2 '"THIS IS A ";: 2 "STRING FIELD": 2 "NUMERIC FIELD": 2 2 1 x$="1 000": 1 with the keyindicated. 1 put RECORD number: ";: 1 Your tab positions are:- 1 You will destroy the file at present in memory. 1 YPO=YPO+(MAXVAL/80 1 Y1=DR+CR-Y2 1 XPO=XPO+16 1 XCO=XCO+16 1 XCO+G,HT+82 1 X1=DC+CC-X2: 1 Word Processor 1 WORD1 1 WORD PROCESSOR OPTIONS 1 WORD x 1 W$="NDMA": 1 W$="ABCD": 1 VAR=CR+DR: 1 There is not enough room for theoptions selected. 1 The file loaded was not a text file. 1 TYPE=TYPE+1 1 TIME WORDS FREE 1 T;" to: ";: 1 T,U;"FIELD TITLE: ": 1 T$=T$+N$(F): 1 T$=T$+N$(F) 1 T$+F)=T$(F): 1 T$(A)="S": 1 SpreadSheet 1 Sample Data File - "MONEY" 1 Sample Data File - "DFILE" 1 SYMBOL SHIFT 1 SURNAME FIRST NAMEADDRESS1 ADDRESS2 TELEPHONE AGE 1 START=DEG: 1 SSSSSN 1 SPREADSHEET 1 SPREAD3 OM 1 SPREAD1 # 1 SPREAD m 1 RECORD DELETED 1 R0+" RECORDS": 1 Preview the text? 1 Press any key to start printing. 1 Press any key to select again. 1 Press any key to continue. 1 Peter Williamson0 1 Paged mode? 1 PRINT ROWS 1 PRESS ANY KEY TO CONTINUE 1 PNUM1)(F): 1 ONLY ONE RECORD ENTERED 1 OLDDC=DC+1 1 OLDCR=DR+CR: 1 OLDCC=DC+CC: 1 O(V)=-O(V): 1 NUM>99999999 1 NUM=NUM/PNUM 1 NUM=NUM+N(F): 1 NUM1=PNUM1+( 1 NUM1=NUM1-NUM+.005 1 NUM1=NUM1*100 1 NUM1/PNUM<10 1 NUM/100000000 1 NEG INDICE 1 N8=B8+C8+D8+E8+F8+G8+H8+I8+J8+K8+L8+M8 1 N7=N2+N3+N4+N5+N6 1 N6=B6+C6+D6+E6+F6+G6+H6+I6+J6+K6+L6+M6 1 N5=B5+C5+D5+E5+F5+G5+H5+I5+J5+K5+L5+M5 1 N4=B4+C4+D4+E4+F4+G4+H4+I4+J4+K4+L4+M4 1 N3=B3+C3+D3+E3+F3+G3+H3+I3+J3+K3+L3+M3 1 N2=B2+C2+D2+E2+F2+G2+H2+I2+J2+K2+L2+M2 1 N14=N12-N13 1 N13=N12*0.75 1 N12=N10-N11 1 N(F)>MAXVAL 1 N$>99999.99 1 N$=" ": 1 N$=" ": 1 Mini Office 1 Make sure the printer is ready. 1 MONEY ) 1 MINI OFFICE DATABASE 1 MIN2>MAXVAL 1 MIN2=MIN*-1 1 MAXVAL=N(F) 1 MAXVAL=MIN2 1 M7=M2+M3+M4+M5+M6 1 M14=M12-M13 1 M13=M12*0.75 1 M12=M10-M11 1 Loading a file will destroy the file at present in memory. 1 LER=LER+Y1: 1 L7=L2+L3+L4+L5+L6 1 L3=L3+45000 1 L14=L12-L13 1 L13=L12*0.75 1 L12=L10-L11 1 K7=K2+K3+K4+K5+K6 1 K14=K12-K13 1 K13=K12*0.75 1 K12=K10-K11 1 K+" FIELDS REPLACED": 1 K$="ZERO RECORDS ENTERED": 1 K$="ROOM FOR ONLY "+ 1 K$="PRESS ANY KEY FOR MENU": 1 K$="OPTION "+W$+" SEL 1 K$="NO MORE RECORDS FOUND TO MATCH": 1 K$="NO MATCH FOUND": 1 K$="MEMORY FULL": 1 K$="MAXIMUM OF "+ 1 K$="IS THIS CORRECT (Y/N)?": 1 K$="FILE NOT SETUP - use option B": 1 K$="END OF RANGE SPECIFIED": 1 K$="ARE YOU SURE (Y/N)?": 1 K$="(N)ext record, (M)enu": 1 K$="(N)ext (D)elete (A)lter (M)enu": 1 K$="(M)odify rec, (R)eturn to menu": 1 K$="(M)enu, (N)ext record, (A)lter": 1 JONES SIMON 6 BROAD LANE LIVERPOOL 051-633 8000 ANDREWS PETER 12 ELF ROAD HEREFORD 321-623451 SMITH JANE 42 HIGH STREET SALFORD 832-61421 YATES IAN 177 FORD ROAD GULLHAM 452-986 76543 ANDREWS JAMES 12 ELF ROAD HEREFORD 321-623451 LORD ANDREA 42 GLENDALE AVE. CREWE 164-28972 STEVENS MARY 37 BANK DRIVE RUGBY 371-308 3000 BRINN KIETH 15 MILL ROAD WARRINGTON 853-80923 HALL CHARLES 33 TORR ROAD SWANSEA 221-668973 BROWN JIM 8 ELM ROAD NANTWICH 1 J7=J2+J3+J4+J5+J6 1 J14=J12-J13 1 J13=J12*0.75 1 J12=J10-J11 1 Input tab value 1 ILLEGAL SELECTION 1 IBL=IBL*10 1 I7=I2+I3+I4+I5+I6 1 I14=I12-I13 1 I13=I12*0.75 1 I12=I10-I11 1 How wide for the left margin? 1 How many lines per page? 1 How many characters per line? 1 H7=H2+H3+H4+H5+H6 1 H14=H12-H13 1 H13=H12*0.75 1 H12=H10-H11 1 GRAPH3 K& 1 GRAPH1 # 1 GRAPH ` 1 G7=G2+G3+G4+G5+G6 1 G14=G12-G13 1 G13=G12*0.75 1 G12=G10-G11 1 For use when in an editing mode. 1 FINISH=DEG+(N(F)/TOTAL*360 1 FINISH-START<90 1 FINISH-START/G,FINISH-START/G,FINISH-START/57.324 1 F7=F2+F3+F4+F5+F6 1 F14=F12-F13 1 F13=F12*0.75 1 F12=F10-F11 1 F$=F$+"=": 1 F$(XC+F)>47 1 F$(XC+F)="." 1 F$(XC+F)<58 1 F$(O);":";: 1 EDITING FUNCTIONS 1 E7=E2+E3+E4+E5+E6 1 E14=E12-E13 1 E13=E12*0.75 1 E12=E10-E11 1 Double width characters? 1 Double height characters? 1 Database Publications 1 DFILE 0 1 DFILE 5 1 DEG=DEG+N(F)/TOTAL*360 1 DBASE3 `4 1 DBASE1 # 1 DBASE L 1 D7=D2+D3+D4+D5+D6 1 D14=D12-D13 1 D13=D12*0.75 1 D12=D10-D11 1 D(O(V),K(O)) 1 D(O(V),K(E))=U: 1 D(O(R),K(A))=B 1 D(O(Q),K(A))=B 1 D(O(Q),K(A)) 1 D(O(A),K(O)) 1 D(1,1)=T=U=NM=D$(1,1,1)=G$=LS=NS=H=O(1)=R=S$(1)=E$(1)=T$(1,1)=R0= 1 D$(O(V),K(O)): 1 D$(O(V),K(E))=K$: 1 D$(O(V),K(E))=D$(O(V),K(E), 1 D$(O(R),K(A))=S$: 1 D$(O(Q),K(A))=S$: 1 D$(O(Q),K(A)): 1 D$(O(A),K(O)): 1 CENT=CENT-.5 1 C7=C2+C3+C4+C5+C6 1 C14=C12-C13 1 C13=C12*0.75 1 C12=C10-C11 1 BER=BER/100 1 BER=BER*-1 1 BER<10000000 1 BASE=BASE+2 1 BASE=45009 1 BASE=45001 1 B7=B2+B3+B4+B5+B6 1 B14=B12-B13 1 B13=B12*0.75 1 B12=B10-B11 1 B$=F$(XC+1 1 Are you sure? 1 Are you sure? 1 Are these O.K.? 1 All functions are obtained bypressing 1 ARE YOU SURE (Y/N)? 1 A,B;">";N$;"<" 1 A$=" ": 1 ;F$;"< " 1 ;F$(O);":";: 1 ;F$(A);":"; 1 ;"ZEROED": 1 ;"ZERO BOXES"; 1 ;"UPDATING CONTINUOUSLY (Y/N) ?" 1 ;"SUM OF DATA EQUALS ZERO SELECT AGAIN": 1 ;"SPREADSHEET"; 1 ;"SORTING"; 1 ;"SORTED ";: 1 ;"SORT FIELD ";T;": ": 1 ;"SELECT ROW ( 2-"; 1 ;"SELECT OPTION": 1 ;"SELECT OPTION" 1 ;"SELECT COLUMN (Y/N)"; 1 ;"SEARCHING"; 1 ;"SAVED ": 1 ;"SAVE FILE"; 1 ;"S P E C T R U M": 1 ;"ROW TITLES"; 1 ;"ROW NUMBER ";ROW;" SELECTED" 1 ;"QUIT "; 1 ;"PRINTOUT"; 1 ;"PRINTER Y/N" 1 ;"PRINT FORMULA" 1 ;"PLEASE WAIT" 1 ;"PIE CHART" 1 ;"OLD FILE NAME : "; 1 ;"OLD FILE NAME : ": 1 ;"NUMBER TO BIG": 1 ;"NO. OF ROWS (9-30) : ";: 1 ;"NO. OF COLUMNS (5-20): ";: 1 ;"NO COPY": 1 ;"MODE ": 1 ;"MODE " 1 ;"MODE ": 1 ;"M E N U": 1 ;"LOAD SPREADSHEET"; 1 ;"LOAD GRAPHICS"; 1 ;"LENGTH"; 1 ;"LABEL ": 1 ;"IS THIS CORRECT (Y/N)?"; 1 ;"INVALID FORMULA TRY AGAIN ": 1 ;"INFORMATION (Y/N)" 1 ;"How many FIELDS per record? ";: 1 ;"HOME ": 1 ;"FORMULAE" 1 ;"FORMULA OKAY " 1 ;"FORMULA " 1 ;"FILE LOADED" 1 ;"FIELD ORDER IS: ";: 1 ;"FIELD No.";A: 1 ;"ENTER FILE NAME :": 1 ;"DATA PROCESSED" 1 ;"DATA BEING PROCESSED" 1 ;"CURSOR ": 1 ;"CREATE A FILE (Y/N)" 1 ;"CORRECT WHICH FIELD? "; 1 ;"COPY " 1 ;"COPIED": 1 ;"COMMAND :" 1 ;"COLUMN VALUE PERCENTAGE" 1 ;"CLEAR " 1 ;"BOX DEFINED ILLEGAL INPUT": 1 ;">";N$;"<";: 1 ;">";F$;"<"; 1 ;">";F$;"<": 1 ;"=======================" 1 ;"===================" 1 ;"================": 1 ;"================" 1 ;"===========" 1 ;"==========" 1 ;"8 - Printer" 1 ;"7 - Spreadsheet" 1 ;"6 - New File" 1 ;"5 - New Data" 1 ;"4 - Information" 1 ;"3 - Graph" 1 ;"2 - Pie Chart" 1 ;"100%=";TOTAL 1 ;"1 - Histogram" 1 ;"---------" 1 ;"-";MAXVAL 1 ;"****GRAPHICS****" 1 ;"****G R A P H I C S****" 1 ;"*** INFORMATION ***": 1 ;"* * * M E N U * * *" 1 ;"(1 to 12)"; 1 ;"( MAXIMUM 15 )" 1 ;" ": 1 ;" " 1 ;" ": 1 ;" " 1 ;" "; 1 ;" ": 1 1 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 000 1 .Return to these options. 1 ..Tab key. 1 ...Verify text file. 1 ...Small letter editing mode. 1 ...Set tab key. 1 ...Save text file. 1 ...Print text file. 1 ...Load text file. 1 ...Large letter editing mode. 1 ...Display editing functions. 1 ...Clear text file. 1 ...Change character set. 1 .....Return to options. 1 .......Typing speed. 1 .......Page end marker. 1 .......Delete key. 1 .......Cusror down. 1 .......Cursor up. 1 .......Cursor right. 1 .......Cursor left. 1 .......Copy key. 1 .......Copy function. 1 .......Caps lock. 1 ..................... 1 ........... 1 ,U;"FIELD TYPE (S/N): "; 1 ,U;"FIELD LENGTH: ";: 1 +L2*L1+45001 1 +F)=T$(F): 1 +A);"> ";G$: 1 );"=";W$(F): 1 )/(NS*LS+5 1 )+K$+D$(O(V),K(E),B+ 1 )+(N(F)/80 1 (W$(O))+32 1 (R0-R)+" RECORD(S)": 1 (NUM1/PNUM+.5 1 (FINISH-START)/57.324 1 (F(A));F(A); 1 ((NUM/100000000 1 ((N(F)/TOTAL*100 1 (((START+FINISH)/2 1 (((FINISH+START)/2 1 ''"VALUE a:";: 1 ''"SORT ON FIELD 1: ";F$(1 1 ''"SEARCH ON WHICH FIELD (1-";F;")?";: 1 ''"REWIND THE TAPE"': 1 ''"REPLACE ON WHICH FIELD (1-";F;")?";: 1 ''"Input range"''"From: ";: 1 ''"INPUT SEARCH VALUE X:";: 1 ''"INPUT SEARCH STRING:";: 1 ''"INPUT SEARCH STRING: ";: 1 ''"INPUT REPLACE VALUE:";: 1 ''"INPUT REPLACE STRING:";: 1 ''"Do you wish to SAVE"'"the data file (Y/N)?" 1 ''"<A> SEARCH FOR A VALUE X"'"<B> SEARCH FOR VALUES >X"'"<C> SEARCH FOR VALUES <X"'"<D> SEARCH FOR a<X<b RANGE" 1 ''"<A> SEARCH FOR A SPECIFIC STRING"'"<B> SEARCH FOR PART-STRING": 1 ''"<A> REPLACE WHOLE STRING FIELD"'"<B> REPLACE PART-STRING FIELD": 1 '"VALUE b:";: 1 '"SELECT UP TO ";U;" FIELDS FOR SORT": 1 '"RECORD No.";Q: 1 '"INPUT SEARCH VALUE:";: 1 '" <A> SORT INTO ASCENDING ORDER"'" <B> SORT INTO DESCENDING ORDER"''" SELECT OPTION" 1 "SETUP MODE:"; 1 "SEARCH ON FIELD ";E;": ";F$(E): 1 "SEARCH AND REPLACE MODE:": 1 "REPLACE ON FIELD ";E;":";F$(E): 1 "RECORD No.";R: 1 "RECORD No.";A: 1 "RECORD No. ";V: 1 "NUMERIC": 1 "MULTI-FIELD SORT MODE:": 1 "MODIFY MODE:"''"In 1 "LOAD OLD FILE","SETUP NEW FILE","ADD RECORDS","FIELD SUMMARY","MODIFY RECORD","LIST RECORDS","FIELD SEARCH","REPLACE FIELD","MULTI-FIELD SORT","SAVE CURRENT FILE","END PROGRAM" 1 "LIST RECORDS MODE: "''''" <A> LIST RECORDS TO SCREEN"''" <B> LIST RECORDS TO PRINTER"'''' 1 "FIELD-SEARCH MODE:": 1 "Do you wish to VERIFY "'"the file (Y/N)?": 1 "DEFINITION OF FIELD";: 1 "DATA FILE LOADED"''"PRESS ANY KEY FOR MENU": 1 "ADD RECORD MODE:" 1 w.p.m. 1 at any time to abort 1 CAPS SHIFT 1 WORD PROCESSOR 1 SPREADSHEET 1 SPEED = 1 GRAPHICS 1 DATABASE 1 MONEY JANUARYFEBRUARY MARCH APRIL MAY JUNE JULY AUGUST SEPT OCTOBERNOVEMBERDECEMBER TOTALMORTGAGE1 85721 85721 85721 85721 91371 91371 91371 91371 91371 85341 85341 85341 105575 FOOD1 46241 41431 36451 32711 41231 38291 32711 27981 35991 40891 39891 46451 46026 FUEL1 46251 47281 36281 32611 25411 20041 22341 16851 24961 29771 35551 48231 38557 LEISURE1 20001 20001 20001 25001 25001 25001 25001 25001 30001 30001 30001 30001 30500 OTHER1 99851 17121 56231 100871 49291 16451 29961 19491 36891 107901 38021 79491 65156 TOT OUT1 298061 211551 234681 276911 232301 191151 201381 180691 219211 293901 228801 289511 285814EARNINGS1 321211 321211 321211 321211 353311 353311 353311 353311 353311 353311 353311 353311 411132 B.FWD.1 27251 12601 30571 29281 18401 34861 49261 50301 55731 47461 26721 37811 2541 TOT IN1 348 1